home *** CD-ROM | disk | FTP | other *** search
/ PsL Monthly 1993 December / PSL Monthly Shareware CD-ROM (December 1993).iso / prgmming / win / c / winet.com / DBPROC.C < prev    next >
Encoding:
C/C++ Source or Header  |  1987-06-08  |  1.3 KB  |  52 lines
  1. #include <dgb.h>
  2. #include "types.h"
  3. #include "dbproc.h"
  4. #include "segments.h"
  5. #include "trace.h"
  6. #include "segbug.h"
  7.  
  8. void far DebugProc (fn, a)
  9. WORD fn;
  10. ARG far *a;
  11. {
  12.    switch (fn)
  13.    {
  14.    case 3:  /*trace("Heap initialised to %w\n", a->pGlobalHeap);*/
  15.         LockTimer(FALSE);
  16.         break;
  17.    case 0:
  18.       switch (a->d.Type)
  19.       {
  20.       case 0:  /*trace("%s!Code(%w) = %w\n", (LPSTR) a->d.SegName, a->d.Ordinal, a->d.SegLoc);*/
  21.            DefineSegment (a->d.SegName, a->d.Ordinal, a->d.SegLoc, a->d.Instance, 0);
  22.            break;
  23.       case 1:  /*trace("%s!Data/%d(%w) = %w\n", (LPSTR) a->d.SegName, a->d.Instance, a->d.Ordinal, a->d.SegLoc);*/
  24.            DefineSegment (a->d.SegName, a->d.Ordinal, a->d.SegLoc, a->d.Instance, 1);
  25.            break;
  26.       default: /*trace("%s!%w/%d(%w) = %w\n", a->d.SegName, a->d.Instance, a->d.Ordinal, a->d.SegLoc);*/
  27.            break;
  28.       }
  29.       break;
  30.    case 1:  if (a->m.to == 0)
  31.         {
  32.            /*trace ("Discard %w\n", a->m.from);*/
  33.            DiscardSegment (a->m.from);
  34.         }
  35.         else
  36.         {
  37.            /*trace("%w moved to %w\n", a->m.from, a->m.to);*/
  38.            MoveSegment (a->m.from, a->m.to);
  39.         }
  40.         break;
  41.    case 2:  /*trace("Delete %w\n", a->DiscardSeg);*/
  42.         DiscardSegment (a->DiscardSeg);
  43.         break;
  44.    }
  45. }
  46.  
  47. void far MultiPlex (type)
  48. BYTE type;
  49. {
  50.    return;
  51. }
  52.